perm filename TST.SEX[HAL,HE]2 blob sn#210434 filedate 1976-04-13 generic text, type T, neo UTF8
(PR
    (BL
    (EVAR EVNT)
    (PRINT "BPARK IS NOW ")
    (PRINT BPARK)
    (ASSERT (AF BARM = BPARK))
    (MO BARM BPARK (DURATION = 3))
    (PRINT "BARM IS NOW ")
    (PRINT BARM)
    (EV EVNT -)
    )
)